home *** CD-ROM | disk | FTP | other *** search
/ Developer Helper 1: Phil & Dave's Excellent CD / Excellent CD HFS.raw / HyperCard / HyperCard 1.2.2 International / HyperCard Danish (DK-1.2.2) / Flere stakke / Salgsrapport / card_4883.txt < prev    next >
Text File  |  1988-12-19  |  2KB  |  85 lines
  1. -- card: 4883 from stack: in
  2. -- bmap block id: 3467
  3. -- flags: 0000
  4. -- background id: 3315
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on mouseUp
  8.   go to next card
  9. end mouseUp
  10.  
  11.  
  12.  
  13. -- part 2 (field)
  14. -- low flags: 00
  15. -- high flags: 0004
  16. -- rect: left=11 top=25 right=303 bottom=510
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 0 / 0
  19. -- text alignment: 1
  20. -- font id: 3
  21. -- text size: 32
  22. -- style flags: 256
  23. -- line height: 42
  24. -- part name: 
  25.  
  26.  
  27. -- part 1 (button)
  28. -- low flags: 00
  29. -- high flags: A002
  30. -- rect: left=438 top=265 right=293 bottom=499
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 0 / 0
  33. -- text alignment: 1
  34. -- font id: 0
  35. -- text size: 12
  36. -- style flags: 0
  37. -- line height: 16
  38. -- part name: Indeks
  39. ----- HyperTalk script -----
  40. on mouseUp
  41.   -- Automatic card numbering and labeling
  42.   set cursor to 4 -- A watch
  43.   set lockscreen to true -- Not display cards in the loop
  44.   go to next card
  45.   put (number of cards - 1) into total -- Number of cards in the stack
  46.   repeat with index = 1 to total
  47.     put index & " af " & total into background field "Sidenr."
  48.     put "1988 Rapport" into background field "Toptekst"
  49.     go to next card
  50.   end repeat
  51.   set lockscreen to false
  52.   go to next card
  53. end mouseUp
  54.  
  55.  
  56.  
  57.  
  58. -- part 4 (button)
  59. -- low flags: 00
  60. -- high flags: 0000
  61. -- rect: left=451 top=307 right=340 bottom=490
  62. -- title width / last selected line: 0
  63. -- icon id / first selected line: 21700 / 21700
  64. -- text alignment: 1
  65. -- font id: 0
  66. -- text size: 12
  67. -- style flags: 0
  68. -- line height: 16
  69. -- part name: Hjem
  70. ----- HyperTalk script -----
  71. on mouseUp
  72.   visual effect iris close
  73.   go home
  74. end mouseUp
  75.  
  76.  
  77.  
  78.  
  79. -- part contents for card part 2
  80. ----- text -----
  81.  
  82.  
  83. 1988
  84.  Salgsrapport
  85.